﻿Imports Runa.Core.GamePackage

Partial Public Class MainPage
    Inherits PhoneApplicationPage

    Public ReadOnly Property GameList() As List(Of GamePackageBase)
        Get
            Return Helper.g_gameList
        End Get
    End Property

    Public Sub New()
        InitializeComponent()

        Me.LB_Games.Items.Clear()
        Me.LB_Games.ItemsSource = Me.GameList
    End Sub

    Private Sub LB_Games_SelectionChanged(sender As Object, e As SelectionChangedEventArgs)
        Dim navString = String.Format("/GamePage.xaml?GameName={0}", e.AddedItems(0).ToString())
        NavigationService.Navigate(New Uri(navString, UriKind.Relative))
    End Sub

End Class